Nautilus 1993 September/Nautilus CD Magazine Volume 3-9 September 1993 Windows Edition.mdf/services/sub.tbk

Asymetrix ToolBook File | 1993-06-13 | 44KB | 921 lines

NAUTILUS Subscription Form
:PRINTLAYOUT
09 +w=
Tms Rmn
banner
instr
printThis
printThis2
total
:REPORTDATA
*    stem
s Rmn
printThis
total
phone1
phone2
offer
total
printThis
printThis2
label ship
label tax
label total
total
total
Tms Rmn
banner
instr
printThis
printThis2
label ship
label tax
label total
total
total
Sign me up for 12 issues at
( * Ship/Handling Add'tl)ling Add'tl)
banner
instr
printThis
printThis2
(Prices Subject To Change))  Prices Subject To Change))))
St:::::::::
First Name:
Middle I.::
Last Name::
Title::I.::
Company::::
Address::::
City:::::::
Zip::::::::
Country::::
Voice Phone:
FAX:try.:::
How did you hear about NAUTILUS?]
(Card #):::
(Exp Date):
(Country Name)
Sales Tax::Info*:
Credit Card Information:
price box
total
Subtotal:
Sales Tax::
Shipping:::
Total:al:::
first
title
company
address
state
upperCase(
= "OH")
= "OHIO")
B"OH"
= "FL")
= "FLORIDA")
B"FL"
leaveRecordField
leaveRecordField
buttonUp
FLORIDA
buttonUp
4subDomestic, subBase, subCost, subShip, subTax
B"USA"
"country" =
B"OH"
B"FL"
setTotals
buttonUp
buttonUp
country
country
country
country
setTotals
subDomestic
subBase
subCost
subShip
subTax
North America
International
country
phone1
phone2
4subOffer
setTotals
buttonUp
buttonUp
Offer
setTotals
subOffer
special offer
"offer";
buttonUp
buttonUp
offer
Special Offer...
renewal
"offer"
"Renewal";
buttonUp
buttonUp
offer
Renewal
This is a renewal
offer
pcVersion
PC Version
macVersion
Mac Version
MasterCard
subBase
(Resident of ... ?)ick State of resi
B"USA"
setTotals
initButton
buttonUp
initButton
buttonUp
buttonUp
setTotals
initButton
Florida
Michigan
119.40
18.00
137.401
To subscribe, complete this form, then Link, mail, FAX or call for prompt attention:
[phone]; Intl, [phone]; FAX [phone]; 7001 Discovery Blvd, Dublin OH 43017  (USA).
Subscribe To NAUTILUS!
$ 9.95 ea.**9999999 ea.*
Outbox
enabled
false
myEnabled
Save to Outbox
Print
Print
clear
clearForm
buttonUp
buttonUp
clearForm
Clear
return
4homeBook
K= "Exit")
sysSuspendMessages
default
buttonup
buttonup
default
homeBook
false
false
activateInstance
4homeBook, fromCD, outsideShell, DEVELOP
initVars
B"Return"
"Exit"
enabled
B"Outbox"
clearForm
linkBook,
-- NAUTILUS
 globals
outBoxPath, topicName
tempList
"STARTUP.TBK,
NAUT_BW.
LINK.
testName
"OutboxFile()"
 "ToolBook"
r= "OK")
"getNautilusVar(
r= "OK");
OutBoxFile()
value
(the
"0,0,0"
"0,50,0";
excludeTab
myEnabled
eInstance
enterBook
leaveBook
activateInstance
initVars
rightButtonDoubleClick
enabled
activateInstance
enterBook
enterBook
{initVars
Return
Return
Return
Outbox
enabled
sizeToPage
homeBook
fromCD
outsideShell
DEVELOP
leaveBook
clearForm
DEVELOP
initVars
STARTUP.TBK,NAUTILUS.TBK,NAUT_BW.TBK,LINK.TBK
OutboxFile()
ToolBook
getNautilusVar(linkBook)
OutBoxFile
ToolBook
testName
tempList
outsideShell
outBoxPath
topicName
homeBook
linkBook
fromCD
enabled
button
0,0,0
0,50,0
myEnabled
value
rightButtonDoubleClick
DEVELOP
4outBoxPath, topicName
sysSuspendMessages
omyEnabled)
order via Link, you must" && \
install NAUTILUS
your hard disk
have" &&\
&running."
verify()
"Please include" &&
& "."
B"renewal");
"RENEWAL";
subOrder
B"pcVersion");
"PC";
"Mac";
\" * 100
"ship" * 100
"tax" * 100
"total" * 100
"offer"
"mi"
"title"
"company"
"address"
"city"
"state"
"zip"
"country"
"phone1"
"phone2"
B"mc");
"Master Card"
B"visa");
"Visa"
"card"
"***--- Subscribe" &
srcFile
destFile
 & "SUB.TBK"
FileCopy(" &
& "," &
& ")"
 ToolBook
"Unable
." &
default
fName
 has been saved
Outbox.
subscription
." &
buttonUp
buttonUp
myEnabled
To send this order via Link, you must
first install NAUTILUS to your hard disk and have
NAUTILUS running.
verify
Please include
renewal
RENEWAL
pcVersion
total
offer
first
title
company
address
state
country
phone1
phone2
Master Card
***--- Subscribe
SUB.TBK
Unable to save this order.
SUB.ORD
Message has been saved in your Outbox.  Please send via Link.
Unable to save subscription order.
fName
default
destFile
srcFile
subOrder
outBoxPath
topicName
4blankForm
sysSuspendMessages
"Print Blank
Current Information?"
"Cancel"
"NAUTILUS Subscription Order:" &
        fldText("Name","
J") &\
Title","title") &\
4Company","company") &\
OAddress","address") &\
j","city,state,zip") &\
Country","country") &\
Voice","phone1") &\
FAX", "phone2") &\
Offer","offer") &\
        radioChoice("Version","pcVersion,macVersion") &\
7Credit Card","mc,visa")&\
umber","card") &\
Expires","
") &\
"printThis"
"SubTotal:" & priceText("sub") &\
        "Sales Tax:" &
"tax") &\
        "s/h:" &
8hip") &\
Qt("total") &\
        "*Prices Subject To Change" &
        "Signature:" &
9& blankLine()
"printThis2"
"banner,instr,
 fldLabel, fldList
" <>
& " "
t <>
 priceFld
"0.00";
btnList
"x";
"[" & mh & "]" &&
"_______________________________________" &
buttonUp
iceText
fldText
radioChoice
priceText
blankLine
buttonUp
Print Blank Form or Current Information?
Blank Form
Current Form
Cancel
Cancel
Blank Form
NAUTILUS Subscription Order:
first,mi,last
fldText
Title
title
fldText
Company
company
fldText
Address
address
fldText
city,state,zip
fldText
Country
country
fldText
Voice
phone1
fldText
phone2
fldText
Offer
offer
fldText
Version
pcVersion,macVersion
radioChoice
Credit Card
mc,visa
radioChoice
Number
fldText
Expires
fldText
printThis
SubTotal:
priceText
Sales Tax:
priceText
priceText
*Total:
total
priceText
*Prices Subject To Change
Signature:
blankLine
printThis2
banner,instr,printThis,printThis2
blankForm
fldText
blankLine
blankForm
fldList
fldLabel
priceText
priceFld
radioChoice
blankForm
btnList
fldLabel
blankLine
_______________________________________
mh = "
mh = "
4vCnt
initForm
clearTotals
4domesticSub
B"USA"
setTotals
setDomestic
4subBase, subCost, subShip, subTax
"9.95"
"119.40"
"18.00"
"0.00"
setIntl
"14.50"
"174.00"
"48.00"
"0.00"
4subDomestic,
, subOffer
B"OH"
.0575
B"FL"
.0600
B"MI"
.0400
 = "Renewal");
"$" &&
 && "ea.*"
 * 12)
%"0.00"
%"0.00"
"tax"
"sub"
"ship"
%"0.00"
"total"
clearForm
"offer"
"title"
"company"
"address"
"city"
"state"
"zip"
"country"
"phone1"
"phone2"
initButton
B"special
B"pcVersion"
B"mc"
B"OH"
"card"
"printThis"
"printThis2"
initFields
4linkBook, outsideShell
" <>
J" <>
userInfo
"mi"
= "OH")
B"OH"
= "FL")
B"FL"
= "MI")
B"MI"
= "CANADA")
= "MEXICO")
= "Visa")
B"visa"
= "MasterCard");
B"mc"
verify
,First Name"
J" =
J,Last
,Address"
,City"
,State"
"zip,Zip"
,Phone Number"
,Credit
,Expiration Date"
"Country" =
p     < 1)
 (NAU # on
disc packaging)"
("Where did you
mhInit
mhSaveAs
fldList
"Nothing selected!";
baseLines
drawDirect
drawTextDirect
fieldType
earTotals
setDomestic
setIntl
buttonUp
setTotals
clearForm
enterPage
initForm
enterRecordField
initFields
initButton
mhInit
clearTotals
verify
enterRecordField
buttonUp
radiobutton
group
enterPage
sinitForm
clearTotals
buttonUp
setTotals
domesticSub
setDomestic
119.40
18.00
subBase
subCost
subShip
subTax
setIntl
14.50
174.00
48.00
subBase
subCost
subShip
subTax
setTotals
setDomestic
Renewal
setDomestic
LsetIntl
subBase
total
subDomestic
subBase
subCost
subShip
subTax
subOffer
clearForm
offer
first
title
company
address
state
country
phone1
phone2
initButton
special offer
initButton
pcVersion
initButton
initButton
initButton
clearTotals
printThis
printThis2
initForm
setDomestic
initFields
initButton
pcVersion
setTotals
initFields
first
userInfo
first
title
company
address
state
buttonUp
buttonUp
buttonUp
CANADA
MEXICO
buttonUp
country
phone1
phone2
buttonUp
MasterCard
buttonUp
linkBook
outsideShell
initButton
buttonUp
verify
first
first,First Name
last,Last Name
address
address,Address
city,City
state
state,State
zip,Zip
phone1
phone,Phone Number
card,Credit Card
exp,Expiration Date
Country
country,Country
offer
Offer Number (NAU # on the disc packaging)
Where did you get this disc?
offer
mhInit
clearForm
gmhSaveAs
enterPage
Nothing selected!
background
foreground
clear
fldList
mh = "
mh = "
4vCnt
initForm
clearTotals
4domesticSub
B"USA"
setTotals
setDomestic
4subBase, subCost, subShip, subTax
"9.95"
"119.40"
"18.00"
"0.00"
setIntl
"14.50"
"174.00"
"48.00"
"0.00"
4subDomestic,
, subOffer
B"OH"
.0575
B"FL"
.0600
B"MI"
.0400
 = "Renewal");
"$" &&
 && "ea.*"
 * 12)
%"0.00"
%"0.00"
"tax"
"sub"
"ship"
%"0.00"
"total"
clearForm
"offer"
"title"
"company"
"address"
"city"
"state"
"zip"
"country"
"phone1"
"phone2"
initButton
B"special
B"pcVersion"
B"mc"
B"OH"
"card"
"printThis"
"printThis2"
initFields
4linkBook, outsideShell
" <>
J" <>
userInfo
"mi"
= "OH")
B"OH"
= "FL")
B"FL"
= "MI")
B"MI"
= "CANADA")
= "MEXICO")
= "Visa")
B"visa"
= "MasterCard");
B"mc"
verify
,First Name"
J" =
J,Last
,Address"
,City"
,State"
"zip,Zip"
,Phone Number"
,Credit
,Expiration Date"
"Country" =
     < 1)
 (NAU # on
disc packaging)"
("Where did you
mhInit
mhSaveAs
fldList
"Nothing selected!";
baseLines
drawDirect
drawTextDirect
fieldType
earTotals
setDomestic
setIntl
buttonUp
setTotals
clearForm
enterPage
initForm
enterRecordField
initFields
initButton
mhInit
clearTotals
verify
enterRecordField
buttonUp
radiobutton
group
enterPage
sinitForm
clearTotals
buttonUp
setTotals
domesticSub
setDomestic
119.40
18.00
subBase
subCost
subShip
subTax
setIntl
14.50
174.00
48.00
subBase
subCost
subShip
subTax
setTotals
setDomestic
Renewal
setDomestic
LsetIntl
subBase
total
subDomestic
subBase
subCost
subShip
subTax
subOffer
clearForm
offer
first
title
company
address
state
country
phone1
phone2
initButton
special offer
initButton
pcVersion
initButton
initButton
initButton
clearTotals
printThis
printThis2
initForm
setDomestic
initFields
initButton
pcVersion
setTotals
initFields
first
userInfo
first
title
company
address
state
buttonUp
buttonUp
buttonUp
CANADA
MEXICO
buttonUp
country
phone1
phone2
buttonUp
MasterCard
buttonUp
linkBook
outsideShell
initButton
buttonUp
verify
first
first,First Name
last,Last Name
address
address,Address
city,City
state
state,State
zip,Zip
phone1
phone,Phone Number
card,Credit Card
exp,Expiration Date
Country
country,Country
offer
Offer Number (NAU # on the disc packaging)
Where did you get this disc?
offer
mhInit
clearForm
gmhSaveAs
enterPage
Nothing selected!
background
foreground
clear
fldList